home *** CD-ROM | disk | FTP | other *** search
/ Sports Illustrated for Kids - Awesome Athletes! / Sports Illustrated for Kids - Awesome Athletes!.iso / ma.dir / 00089.ls < prev    next >
Encoding:
Text File  |  1996-04-18  |  1.0 KB  |  41 lines
  1. global gMAsound
  2.  
  3. on enterFrame
  4.   global gMALev, gMAcurrAth, gMAlowLetterSprite, gMAathStr
  5.   puppetSprite(41, 0)
  6.   set the visible of sprite 41 to 1
  7.   set the visible of sprite 42 to 1
  8.   set the visible of sprite 43 to 1
  9.   updateStage()
  10. end
  11.  
  12. on exitFrame
  13.   global gMALev, gMAcurrAth, gMAlowLetterSprite
  14.   if gMALev > 1 then
  15.     clearBoard(0)
  16.     repeat with X = 1 to length(gMAcurrAth)
  17.       set vChar to char X of gMAcurrAth
  18.       set vSprite to X + gMAlowLetterSprite - 1
  19.       if vChar <> " " then
  20.         puppetSprite(vSprite, 1)
  21.         set the castNum of sprite vSprite to cast vChar
  22.         set the loc of sprite vSprite to point(5 + (X * 33), 464)
  23.         if gMAsound then
  24.           puppetSound("pong.aif")
  25.           updateStage()
  26.         end if
  27.         set vNewTime to the timer + 15
  28.         repeat while the timer < vNewTime
  29.           nothing()
  30.         end repeat
  31.       end if
  32.     end repeat
  33.   end if
  34.   puppetSprite(41, 0)
  35.   set the visible of sprite 41 to 1
  36.   set the visible of sprite 42 to 1
  37.   set the visible of sprite 43 to 1
  38.   updateStage()
  39.   go(#next)
  40. end
  41.